Build fix for glibc systems.

diff --git a/src/process.c b/src/process.c
index 5fee8b0cc3235e7c8473c99f03fa42a89159e5db..0e4fcb2c0a984ea2372f8139b8a564dc6354d40d 100644 (file)
--- a/src/process.c
+++ b/src/process.c
@@ -3318,6 +3318,7 @@ void connect_network_socket (Lisp_Object proc, Lisp_Object ip_addresses)
 
 }
 
+#ifndef HAVE_GETADDRINFO
 static Lisp_Object
 conv_numerical_to_lisp (unsigned char *number, unsigned int length, int port)
 {
@@ -3331,6 +3332,7 @@ conv_numerical_to_lisp (unsigned char *number, unsigned int length, int port)
 
   return address;
 }
+#endif
 
 /* Create a network stream/datagram client/server process.  Treated
    exactly like a normal process when reading and writing.  Primary
@@ -3699,6 +3701,7 @@ usage: (make-network-process &rest ARGS)  */)
   if (!NILP (host))
     {
       struct addrinfo *res, *lres;
+      int ret;
 
       immediate_quit = 1;
       QUIT;